home *** CD-ROM | disk | FTP | other *** search
/ PC-X 1997 October / pcx14_9710.iso / swag / delphi.swg / 0073_Delphi: How to do Screensaver.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1995-11-24  |  912 b   |  23 lines
  1.  
  2. Someone posted a message requesting information on how to use Delphi for 
  3. a screen saver. 
  4.  
  5. a) In the project file (*.dpr) add '{$D SCRNSAVE <saver name>} after the
  6. uses clause.
  7.  
  8. b) On the main form, turn off the border and icon controls. In the 
  9. activate method set the form left and top to 0, and set the Windowstate 
  10. to wsMaximize.
  11.  
  12. c) In the form create method, set the application.OnMessage to a method 
  13. that controls the deactivation of the screen saver. Set the 
  14. application.OnIdle method to whatever display method for the saver.
  15.  
  16. d) In the form create method the command line should be tested for /c and 
  17. /s. These are the command line parameters windows uses to define whether 
  18. the screensaver should run or configure. (/c is for configuration)
  19.  
  20. e) Compile the program, and rename the .exe to .scr. Move it to the
  21. windows directory, and it should show up in the control panel.
  22.  
  23.